home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / maxnlpes.iif < prev    next >
Text File  |  1993-08-23  |  525b  |  30 lines
  1. inst4.1     !Aug 28, 1992
  2.  
  3. ! Calculates learn layer with maximum # pes
  4. ! On output:
  5. ! n0 contains # layers
  6. ! n1 contains max nume pes in a learnin layer
  7. @LLsl                !Load super-layer
  8. =n0    Lpes            !Number of layers
  9. =n1    0            !Use for highest # PEs
  10. =LayN    0
  11.  
  12. :LyLoop
  13. +LayN    1            !next layer
  14. ?LayN    n0
  15. >bgt    LyLpEnd            !past output layer
  16. @LLly                !load the layer
  17. =Llrn    0            !check if layer learns
  18. >beq    LyLoop            !no it does not,; skip it
  19. ?n1    Lpes            !#PEs > current?
  20. >bge    LyLoop
  21. =n1    Lpes
  22. >br    LyLoop
  23. :LyLpEnd
  24.  
  25. ?n1    0
  26. >bgt    EndMxPE
  27. =n1    1
  28. :EndMxPE
  29.  
  30.